package com.sxx.mall.product.service.impl;

import com.alibaba.fastjson.JSON;
import com.alibaba.fastjson.TypeReference;
import com.baomidou.mybatisplus.core.conditions.query.QueryWrapper;
import com.baomidou.mybatisplus.core.metadata.IPage;
import com.baomidou.mybatisplus.extension.service.impl.ServiceImpl;
import com.sxx.commons.utils.PageUtils;
import com.sxx.commons.utils.Query;
import com.sxx.mall.product.dao.CategoryDao;
import com.sxx.mall.product.entity.CategoryEntity;
import com.sxx.mall.product.service.CategoryBrandRelationService;
import com.sxx.mall.product.service.CategoryService;
import com.sxx.mall.product.vo.Catalog2VO;
import org.redisson.api.RLock;
import org.redisson.api.RedissonClient;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.cache.annotation.CacheEvict;
import org.springframework.cache.annotation.Cacheable;
import org.springframework.cache.annotation.Caching;
import org.springframework.data.redis.core.StringRedisTemplate;
import org.springframework.data.redis.core.script.DefaultRedisScript;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;
import org.springframework.util.StringUtils;

import java.util.*;
import java.util.concurrent.TimeUnit;
import java.util.stream.Collectors;

@Service("categoryService")
public class CategoryServiceImpl extends ServiceImpl<CategoryDao, CategoryEntity> implements CategoryService {

    @Autowired
    CategoryBrandRelationService categoryBrandRelationService;

    @Autowired
    private StringRedisTemplate stringRedisTemplate;

    @Autowired
    RedissonClient redissonClient;
    @Override
    public PageUtils queryPage(Map<String, Object> params) {
        IPage<CategoryEntity> page = this.page(
                new Query<CategoryEntity>().getPage(params),
                new QueryWrapper<CategoryEntity>()
        );

        return new PageUtils(page);
    }

    /**
     * 查询所有的类别数据，然后将数据封装为树形结构，便于前端使用
     *
     * @param params
     * @return
     */
    @Override
    public List<CategoryEntity> queryPageWithTree(Map<String, Object> params) {
        // 1.查询所有的商品分类信息
        List<CategoryEntity> categoryEntities = baseMapper.selectList(null);
        // 2.将商品分类信息拆解为树形结构【父子关系】
        // 第一步遍历出所有的大类  parent_cid = 0
        List<CategoryEntity> list = categoryEntities.stream().filter(categoryEntity -> categoryEntity.getParentCid() == 0)
                .map(categoryEntity -> {
                    // 根据大类找到多有的小类  递归的方式实现
                    categoryEntity.setChildrens(getCategoryChildrens(categoryEntity, categoryEntities));
                    return categoryEntity;
                }).sorted((entity1, entity2) -> {
                    return (entity1.getSort() == null ? 0 : entity1.getSort()) - (entity2.getSort() == null ? 0 : entity2.getSort());
                }).collect(Collectors.toList());
        // 第二步根据大类找到对应的所有的小类
        return list;
    }


    /**
     * 查找该大类下的所有的小类  递归查找
     *
     * @param categoryEntity   某个大类
     * @param categoryEntities 所有的类别数据
     * @return
     */
    private List<CategoryEntity> getCategoryChildrens(CategoryEntity categoryEntity
            , List<CategoryEntity> categoryEntities) {
        List<CategoryEntity> collect = categoryEntities.stream().filter(entity -> {
            // 根据大类找到他的直属的小类
            return entity.getParentCid().equals(categoryEntity.getCatId());
        }).map(entity -> {
            // 根据这个小类递归找到对应的小小类
            entity.setChildrens(getCategoryChildrens(entity, categoryEntities));
            return entity;
        }).sorted((entity1, entity2) -> {
            return (entity1.getSort() == null ? 0 : entity1.getSort()) - (entity2.getSort() == null ? 0 : entity2.getSort());
        }).collect(Collectors.toList());
        return collect;
    }

    /*
     * ids批量删除，逻辑删除
     * */
    @Override
    public void removeCategoryByIds(List<Long> ids) {
        //TODO 1.检查类别数据是否在其他业务中使用

        //批量逻辑删除操作
        baseMapper.deleteBatchIds(ids);
    }

    @Override
    public Long[] findCatelogPath(Long catelogId) {
        List<Long> paths = new ArrayList<>();
        List<Long> parentPath = findParentPath(catelogId, paths);
        Collections.reverse(parentPath);
        return parentPath.toArray(new Long[parentPath.size()]);
    }

    /*
    * @CacheEvict 在更新数据的时候同步删除缓存中的数据
    * @CacheEvict(value = "catagory",allEntries = true)表示删除分区下所有数据
    * value：分区
    * */
    //@CacheEvict(value = "catagory",key = "'getLeveL1Category'")
//    @Caching(evict = {
//            @CacheEvict(value = "catagory",key = "'getLeveL1Category'")
//            ,@CacheEvict(value = "catagory",key = "'getCatelog2Json'")
//    })
    @CacheEvict(value = "catagory",allEntries = true)
    @Transactional
    @Override
    public void updateDetail(CategoryEntity category) {
        //更新类别名称
        this.updateById(category);
        if (!StringUtils.isEmpty(category.getName())){
            //同步更新级联的数据
            categoryBrandRelationService.updateCatelogName(category.getCatId(),category.getName());
            //TODO 同步更新其他冗余数据
        }
    }

    /*
    * 查询出所有的商品大类（一级分类
    *   在注解中我们可以指定对应的缓存的名称，起到一个分区的作用，一般按照业务来区分
    *   @Cacheable({"catagory","product"})代表当前的方法的返回结果是需要缓存的，
    *                                   调用该方法的时候，如果缓存中有数据，那么该方法就不会执行
    *                                   如果缓存中没有数据，那么就执行该方法并且把查询的结果缓存起来
    *   缓存处理
    *       1.存储在Redis中的缓存数据的key默认生成的，缓存名称：SimpleKey[]
    *       2.默认缓存的数据的过期时间是-1永久
    *       3.缓存的数据，默认使用的是jdk的序列化机制
    *   改进
    *       1.生成的缓存数据我们需要指定自定义的key:key属性可以直接字符串定义也可以通过SPEL表达式处理 #root.method.name
    *       2.指定缓存数据的存活时间
    *       3.把缓存的数据保存为Json数据
    * springCache原理
    * CacheAutoConfiguration---》根据指定的spring.cache.type=redis会导入RedisCacheAutoConfiguration
    * */
    @Cacheable(value = {"catagory"},key = "#root.method.name")
    @Override
    public List<CategoryEntity> getLeveL1Category() {
        System.out.println("查询了数据库。。。");
        long start = System.currentTimeMillis();
        List<CategoryEntity> list = baseMapper.queryLevel1Category();
        System.out.println("查询消耗的时间："+ (System.currentTimeMillis() - start));
        return list;
    }

    /**
     * 跟进父编号获取对应的子菜单信息
     * @param list
     * @param parentCid
     * @return
     */
    private List<CategoryEntity> queryByParenCid(List<CategoryEntity> list,Long parentCid){
        List<CategoryEntity> collect = list.stream().filter(item -> {
            return item.getParentCid().equals(parentCid);
        }).collect(Collectors.toList());
        return collect;
    }
    //本地缓存
    private Map<String,Map<String, List<Catalog2VO>>> cache = new HashMap<>();

    /*
    * 查询所有分类数据，并且完成一级二级三级的关联
    * */
    @Cacheable(value = "catagory",key = "#root.methodName")
    @Override
    public Map<String, List<Catalog2VO>> getCatelog2Json() {
        // 获取所有的分类数据
        List<CategoryEntity> list = baseMapper.selectList(new QueryWrapper<CategoryEntity>());
        //获取所有的一级分类的数据
//        List<CategoryEntity> leveL1Category = this.getLeveL1Category();
        List<CategoryEntity> leveL1Category = this.queryByParenCid(list,0l);
        //把一级分类的数据转换为map容器 key就是一级分类的编号，value就是一级分类对应的二级分类数据
        Map<String, List<Catalog2VO>> map = leveL1Category.stream().collect(Collectors.toMap(
                key -> key.getCatId().toString(),
                value -> {
                    //根据一级分类的编号，查询出对应的二级分类的数据
/*                    List<CategoryEntity> l2Catalogs = baseMapper
                        .selectList(new QueryWrapper<CategoryEntity>()
                                .eq("parent_cid", value.getCatId()));*/
                    List<CategoryEntity> l2Catalogs = this.queryByParenCid(list,value.getCatId());
                    List<Catalog2VO> catalog2VOS = null;
                    if (l2Catalogs != null){
                        catalog2VOS = l2Catalogs.stream().map(l2 -> {
                            //需要把查询出来的二级分类的数据填充到对应的Catelog2VO
                            Catalog2VO catalog2VO = new Catalog2VO(l2.getParentCid().toString(),
                                    null, l2.getCatId().toString(), l2.getName());
/*                            List<CategoryEntity> l3Catelogs = baseMapper
                                .selectList(new QueryWrapper<CategoryEntity>()
                                        .eq("parent_cid", catalog2VO.getId()));*/
                            List<CategoryEntity> l3Catelogs =this.queryByParenCid(list,l2.getCatId());
                            if (l3Catelogs != null){
                                //获取到的二级分类对应的三级分类数据
                                List<Catalog2VO.Catalog3VO> catalog3VOS = l3Catelogs.stream().map(l3 -> {
                                    Catalog2VO.Catalog3VO catalog3VO =
                                            new Catalog2VO.Catalog3VO(l3.getParentCid().toString()
                                                    , l3.getCatId().toString(), l3.getName());
                                    return catalog3VO;
                                }).collect(Collectors.toList());
                                //三级分类关联二级分类
                                catalog2VO.setCatalog3List(catalog3VOS);
                            }
                            return catalog2VO;
                        }).collect(Collectors.toList());
                    }

                    return catalog2VOS;
                }
        ));
        return map;
    }

    /**
     * 查询出所有的二级和三级分类的数据
     * 并封装为Map<String, Catalog2VO>对象
     * @return
     */
    //@Override
    public Map<String, List<Catalog2VO>> getCatelog2JsonRedis() {
        String key = "catalogJSON";
        // 从Redis中获取分类的信息

        String catalogJSON = stringRedisTemplate.opsForValue().get(key);
        if(StringUtils.isEmpty(catalogJSON)){
            System.out.println("缓存没有命中。。。");
            // 缓存中没有数据，需要从数据库中查询
            //Map<String, List<Catalog2VO>> catelog2JSONForDb = getCatelog2JSONForDb();
            Map<String, List<Catalog2VO>> catelog2JSONForDb = getCatelog2JSONWithRedisLock();
            if(catelog2JSONForDb == null){
                //那就说明数据库中也不存在，防止缓存穿透
                stringRedisTemplate.opsForValue().set(key,"1",5, TimeUnit.SECONDS);
            }else {
                // 从数据库中查询到的数据，我们需要给缓存中也存储一份
                //防止缓存雪崩
                String json = JSON.toJSONString(catelog2JSONForDb);
                stringRedisTemplate.opsForValue().set("catalogJSON",json,10,TimeUnit.SECONDS);
            }

            return catelog2JSONForDb;
        }
        // 表示缓存命中了数据，那么从缓存中获取信息，然后返回
        Map<String, List<Catalog2VO>> stringListMap = JSON.parseObject(catalogJSON, new TypeReference<Map<String, List<Catalog2VO>>>() {
        });
        return stringListMap;
    }

    public Map<String, List<Catalog2VO>> getCatelog2JSONWithRedisson() {
        String keys = "catalogJSON";
        //获取分布式锁对象
        RLock lock = redissonClient.getLock("catalog2Json-lock");

        Map<String, List<Catalog2VO>> data = null;
        try {
            lock.lock();
            //加锁成功
            data = getDataForDB(keys);
        }finally {
            lock.unlock();
        }
        return data;

    }

    public Map<String, List<Catalog2VO>> getCatelog2JSONWithRedisLock() {
        String keys = "catalogJSON";
        String uuid = UUID.randomUUID().toString();
        //加锁 在执行插入操作的同时设置了过期时间         1key锁名 2 value 3 过期时间 4时间单位
        Boolean lock = stringRedisTemplate.opsForValue().setIfAbsent("lock", uuid, 30, TimeUnit.SECONDS);
        if (lock){
            //给key设置过期时间
            //stringRedisTemplate.expire("lock",20,TimeUnit.SECONDS);
            Map<String, List<Catalog2VO>> data = null;
            //加锁成功
            try {
                data = getDataForDB(keys);
            }finally {
                String srcipts = "if redis.call('get',KEYS[1]) == ARGV[1]  then return redis.call('del',KEYS[1]) else  return 0 end ";
                // 通过Redis的lua脚本实现 查询和删除操作的原子性
                stringRedisTemplate.execute(new DefaultRedisScript<Long>(srcipts,Long.class)
                        ,Arrays.asList("lock"),uuid);
            }
            return data;
        }else{
            //加锁失败
            //休眠+重试
            try {
                Thread.sleep(200);
            } catch (InterruptedException e) {
                throw new RuntimeException(e);
            }
            return getCatelog2JSONWithRedisLock();
        }

    }


    /*
    * 从数据库中查询操作
    * */
    private Map<String, List<Catalog2VO>> getDataForDB(String keys) {
        String catelogJson = stringRedisTemplate.opsForValue().get(keys);
        if (!StringUtils.isEmpty(catelogJson)){
            //说明缓存命中
            //表示缓存命中了数据，那么从缓存中获取信息，然后返回
            Map<String, List<Catalog2VO>> stringListMap = JSON.parseObject(catelogJson, new TypeReference<Map<String, List<Catalog2VO>>>() {
            });
            return stringListMap;
        }
        System.out.println("--------> 查询数据库操作");
        // 获取所有的分类数据
        List<CategoryEntity> list = baseMapper.selectList(new QueryWrapper<CategoryEntity>());
        //获取所有的一级分类的数据
//        List<CategoryEntity> leveL1Category = this.getLeveL1Category();
        List<CategoryEntity> leveL1Category = this.queryByParenCid(list,0l);
        //把一级分类的数据转换为map容器 key就是一级分类的编号，value就是一级分类对应的二级分类数据
        Map<String, List<Catalog2VO>> map = leveL1Category.stream().collect(Collectors.toMap(
                key -> key.getCatId().toString(),
                value -> {
                    //根据一级分类的编号，查询出对应的二级分类的数据
/*                    List<CategoryEntity> l2Catalogs = baseMapper
                        .selectList(new QueryWrapper<CategoryEntity>()
                                .eq("parent_cid", value.getCatId()));*/
                    List<CategoryEntity> l2Catalogs = this.queryByParenCid(list,value.getCatId());
                    List<Catalog2VO> catalog2VOS = null;
                    if (l2Catalogs != null){
                        catalog2VOS = l2Catalogs.stream().map(l2 -> {
                            //需要把查询出来的二级分类的数据填充到对应的Catelog2VO
                            Catalog2VO catalog2VO = new Catalog2VO(l2.getParentCid().toString(),
                                    null, l2.getCatId().toString(), l2.getName());
/*                            List<CategoryEntity> l3Catelogs = baseMapper
                                .selectList(new QueryWrapper<CategoryEntity>()
                                        .eq("parent_cid", catalog2VO.getId()));*/
                            List<CategoryEntity> l3Catelogs =this.queryByParenCid(list,l2.getCatId());
                            if (l3Catelogs != null){
                                //获取到的二级分类对应的三级分类数据
                                List<Catalog2VO.Catalog3VO> catalog3VOS = l3Catelogs.stream().map(l3 -> {
                                    Catalog2VO.Catalog3VO catalog3VO =
                                            new Catalog2VO.Catalog3VO(l3.getParentCid().toString()
                                                    , l3.getCatId().toString(), l3.getName());
                                    return catalog3VO;
                                }).collect(Collectors.toList());
                                //三级分类关联二级分类
                                catalog2VO.setCatalog3List(catalog3VOS);
                            }
                            return catalog2VO;
                        }).collect(Collectors.toList());
                    }

                    return catalog2VOS;
                }
        ));
        //从数据库中获取到了对应的信息，然后在缓存中也存储一份信息
        //cache.put("catalogJSON",map);
        // 表示缓存命中了数据，那么从缓存中获取信息，然后返回
        if(map == null){
            // 那就说明数据库中也不存在  防止缓存穿透
            stringRedisTemplate.opsForValue().set(keys,"1",5, TimeUnit.SECONDS);
        }else{
            // 从数据库中查询到的数据，我们需要给缓存中也存储一份
            // 防止缓存雪崩
            String json = JSON.toJSONString(map);
            stringRedisTemplate.opsForValue().set("catalogJSON",json,10,TimeUnit.MINUTES);
        }
        return map;
    }

    public Map<String, List<Catalog2VO>> getCatelog2JSONForDb() {
        String keys = "catalogJSON";
        synchronized (this){
/*        if (cache.containsKey("catalogJSON")){
            //直接从缓存中获取
            return cache.get("catalogJSON");
        }*/
            String catelogJson = stringRedisTemplate.opsForValue().get(keys);
            if (!StringUtils.isEmpty(catelogJson)){
                //说明缓存命中
                //表示缓存命中了数据，那么从缓存中获取信息，然后返回
                Map<String, List<Catalog2VO>> stringListMap = JSON.parseObject(catelogJson, new TypeReference<Map<String, List<Catalog2VO>>>() {
                });
                return stringListMap;
            }
            System.out.println("--------> 查询数据库操作");
            // 获取所有的分类数据
            List<CategoryEntity> list = baseMapper.selectList(new QueryWrapper<CategoryEntity>());
            //获取所有的一级分类的数据
//        List<CategoryEntity> leveL1Category = this.getLeveL1Category();
            List<CategoryEntity> leveL1Category = this.queryByParenCid(list,0l);
            //把一级分类的数据转换为map容器 key就是一级分类的编号，value就是一级分类对应的二级分类数据
            Map<String, List<Catalog2VO>> map = leveL1Category.stream().collect(Collectors.toMap(
                    key -> key.getCatId().toString(),
                    value -> {
                        //根据一级分类的编号，查询出对应的二级分类的数据
/*                    List<CategoryEntity> l2Catalogs = baseMapper
                            .selectList(new QueryWrapper<CategoryEntity>()
                                    .eq("parent_cid", value.getCatId()));*/
                        List<CategoryEntity> l2Catalogs = this.queryByParenCid(list,value.getCatId());
                        List<Catalog2VO> catalog2VOS = null;
                        if (l2Catalogs != null){
                            catalog2VOS = l2Catalogs.stream().map(l2 -> {
                                //需要把查询出来的二级分类的数据填充到对应的Catelog2VO
                                Catalog2VO catalog2VO = new Catalog2VO(l2.getParentCid().toString(),
                                        null, l2.getCatId().toString(), l2.getName());
/*                            List<CategoryEntity> l3Catelogs = baseMapper
                                    .selectList(new QueryWrapper<CategoryEntity>()
                                            .eq("parent_cid", catalog2VO.getId()));*/
                                List<CategoryEntity> l3Catelogs =this.queryByParenCid(list,l2.getCatId());
                                if (l3Catelogs != null){
                                    //获取到的二级分类对应的三级分类数据
                                    List<Catalog2VO.Catalog3VO> catalog3VOS = l3Catelogs.stream().map(l3 -> {
                                        Catalog2VO.Catalog3VO catalog3VO =
                                                new Catalog2VO.Catalog3VO(l3.getParentCid().toString()
                                                        , l3.getCatId().toString(), l3.getName());
                                        return catalog3VO;
                                    }).collect(Collectors.toList());
                                    //三级分类关联二级分类
                                    catalog2VO.setCatalog3List(catalog3VOS);
                                }
                                return catalog2VO;
                            }).collect(Collectors.toList());
                        }

                        return catalog2VOS;
                    }
            ));
            //从数据库中获取到了对应的信息，然后在缓存中也存储一份信息
            //cache.put("catalogJSON",map);
            // 表示缓存命中了数据，那么从缓存中获取信息，然后返回
            if(map == null){
                // 那就说明数据库中也不存在  防止缓存穿透
                stringRedisTemplate.opsForValue().set(keys,"1",5, TimeUnit.SECONDS);
            }else{
                // 从数据库中查询到的数据，我们需要给缓存中也存储一份
                // 防止缓存雪崩
                String json = JSON.toJSONString(map);
                stringRedisTemplate.opsForValue().set("catalogJSON",json,10,TimeUnit.MINUTES);
            }
            return map;
        }
    }

    /**
     * 225,22,2
     *
     * @param catelogId
     * @param paths
     * @return
     */
    private List<Long> findParentPath(Long catelogId, List<Long> paths) {
        paths.add(catelogId);
        CategoryEntity entity = this.getById(catelogId);
        if (entity.getParentCid() != 0) {
            findParentPath(entity.getParentCid(), paths);
        }
        return paths;
    }
}